% Add SPMs
% B is appeded to A
% Latest date 28.6.2003

function[A]=add(A,B);

n = length(A.spectra);
n1 = length(B.spectra);
A.spectra(n+1:n+n1)=B.spectra;



